home *** CD-ROM | disk | FTP | other *** search
/ IRIX 6.2 Development Libraries / SGI IRIX 6.2 Development Libraries.iso / dist / complib.idb / usr / share / catman / p_man / cat3 / complib / slaed9.z / slaed9
Text File  |  1996-03-14  |  3KB  |  133 lines

  1.  
  2.  
  3.  
  4. SSSSLLLLAAAAEEEEDDDD9999((((3333FFFF))))                                                          SSSSLLLLAAAAEEEEDDDD9999((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      SLAED9 - find the roots of the secular equation, as defined by the values
  10.      in D, Z, and RHO, between KSTART and KSTOP
  11.  
  12. SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  13.      SUBROUTINE SLAED9( K, KSTART, KSTOP, N, D, Q, LDQ, RHO, DLAMDA, W, S,
  14.                         LDS, INFO )
  15.  
  16.          INTEGER        INFO, K, KSTART, KSTOP, LDQ, LDS, N
  17.  
  18.          REAL           RHO
  19.  
  20.          REAL           D( * ), DLAMDA( * ), Q( LDQ, * ), S( LDS, * ), W( * )
  21.  
  22. PPPPUUUURRRRPPPPOOOOSSSSEEEE
  23.      SLAED9 finds the roots of the secular equation, as defined by the values
  24.      in D, Z, and RHO, between KSTART and KSTOP.  It makes the appropriate
  25.      calls to SLAED4 and then stores the new matrix of eigenvectors for use in
  26.      calculating the next level of Z vectors.
  27.  
  28.  
  29. AAAARRRRGGGGUUUUMMMMEEEENNNNTTTTSSSS
  30.      K       (input) INTEGER
  31.              The number of terms in the rational function to be solved by
  32.              SLAED4.  K >= 0.
  33.  
  34.      KSTART  (input) INTEGER
  35.              KSTOP   (input) INTEGER The updated eigenvalues Lambda(I), KSTART
  36.              <= I <= KSTOP are to be computed.  1 <= KSTART <= KSTOP <= K.
  37.  
  38.      N       (input) INTEGER
  39.              The number of rows and columns in the Q matrix.  N >= K (delation
  40.              may result in N > K).
  41.  
  42.      D       (output) REAL array, dimension (N)
  43.              D(I) contains the updated eigenvalues for KSTART <= I <= KSTOP.
  44.  
  45.      Q       (workspace) REAL array, dimension (LDQ,N)
  46.  
  47.      LDQ     (input) INTEGER
  48.              The leading dimension of the array Q.  LDQ >= max( 1, N ).
  49.  
  50.      RHO     (input) REAL
  51.              The value of the parameter in the rank one update equation.  RHO
  52.              >= 0 required.
  53.  
  54.      DLAMDA  (input) REAL array, dimension (K)
  55.              The first K elements of this array contain the old roots of the
  56.              deflated updating problem.  These are the poles of the secular
  57.              equation.
  58.  
  59.  
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.  
  68.  
  69.  
  70. SSSSLLLLAAAAEEEEDDDD9999((((3333FFFF))))                                                          SSSSLLLLAAAAEEEEDDDD9999((((3333FFFF))))
  71.  
  72.  
  73.  
  74.      W       (input) REAL array, dimension (K)
  75.              The first K elements of this array contain the components of the
  76.              deflation-adjusted updating vector.
  77.  
  78.      S       (output) REAL array, dimension (LDS, K)
  79.              Will contain the eigenvectors of the repaired matrix which will
  80.              be stored for subsequent Z vector calculation and multiplied by
  81.              the previously accumulated eigenvectors to update the system.
  82.  
  83.      LDS     (input) INTEGER
  84.              The leading dimension of S.  LDS >= max( 1, K ).
  85.  
  86.      INFO    (output) INTEGER
  87.              = 0:  successful exit.
  88.              < 0:  if INFO = -i, the i-th argument had an illegal value.
  89.              > 0:  if INFO = 1, an eigenvalue did not converge
  90.  
  91.  
  92.  
  93.  
  94.  
  95.  
  96.  
  97.  
  98.  
  99.  
  100.  
  101.  
  102.  
  103.  
  104.  
  105.  
  106.  
  107.  
  108.  
  109.  
  110.  
  111.  
  112.  
  113.  
  114.  
  115.  
  116.  
  117.  
  118.  
  119.  
  120.  
  121.  
  122.  
  123.  
  124.  
  125.  
  126.  
  127.  
  128.  
  129.                                                                         PPPPaaaaggggeeee 2222
  130.  
  131.  
  132.  
  133.